home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / DEF / Convert / Semitones / semitone-to-tonality
Encoding:
Text File  |  1998-10-23  |  633 b   |  20 lines  |  [TEXT/ScoM]
  1. semitone-to-tonality note octave semitones
  2.  
  3. Converts a semitone vector into corresponding tonality notes. Suitable for generating tonality zones based on vector generation. Use within activate-tonality.
  4.  
  5. (activate-tonality (blues1 c 4))
  6. --> ((c 4 d# 4 f 4 f# 4 g 4 a# 4))
  7.  
  8. (tonality-to-semitone (activate-tonality (blues1 c 4)))
  9. --> #(0 3 5 6 7 10)
  10.  
  11. (activate-tonality
  12.    (blues1 c 4)
  13.    (semitone-to-tonality 'c 4 #(0 3 5 6 7 10)))
  14. --> ((c 4 d# 4 f 4 f# 4 g 4 a# 4))
  15.  
  16. (activate-tonality
  17.    (semitone-to-tonality 'c 2 (gen-polygonal 'hexagon 8))
  18.    (semitone-to-tonality 'c 2 
  19.        (vector-round 0 11 (gen-polygonal 'hexagon 8))))
  20.